home *** CD-ROM | disk | FTP | other *** search
/ Atari Mega Archive 1 / Atari Mega Archive - Volume 1.iso / language / isetl.arc / formers.t < prev    next >
Text File  |  1987-08-20  |  274b  |  19 lines
  1.    x := { [i,i**2] : i in [1..10] };
  2. ["function", x];
  3. ["image", { i : i = x(j) }];
  4. ["domain", { j : i = x(j) }];
  5.  
  6.    x := "abcdefg";
  7. ["explode", x, [i: i in x]];
  8. [[i,c]: c=x(i)];
  9.  
  10.    x:= [10..20];
  11. [[i,j]: j=x(i)];
  12.  
  13.    x:= [21..40];
  14. x;
  15. x(5..10);
  16. x(15..30);
  17. x(..10);
  18. x(10..);
  19.